home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh3x / sh32b.d64 / how many prints (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  572b  |  20 lines
  1. 0 REM *** ANZAHL DER ANSCHLAEGE ***
  2. 1 REM *** FUER NL-10 MEGADRIVER ***
  3. 2 REM *** IN PROGRAMM SCHREIBEN ***
  4. 3 :
  5. 4 REM DIESES PRG (W) BY FLORIAN MUELLER
  6. 5 REM MEGADRIVER (W) BY THOMAS BEIGEL
  7. 6 :
  8. 10 PRINT"DISKETTE MIT INSTALLIERTEM TREIBER EIN- LEGEN UND <RETURN> DRUECKEN"
  9. 20 GETA$:IFA$<>CHR$(13) THEN 20
  10. 30 OPEN1,8,15,"I"
  11. 40 OPEN2,8,2,"#"
  12. 50 PRINT#1,"U1 2 0 17 0"
  13. 60 PRINT#1,"B-P 2 41"
  14. 70 GET#2,A$
  15. 80 PRINTCHR$(147)"ANZAHL DER DRUCKVORGAENGE PRO ZEILE:";ASC(A$)
  16. 90 INPUT "NEUE ANZAHL";A
  17. 100 IF A<>INT(A) OR A<1 OR A>255 THEN 90
  18. 110 PRINT#1,"B-P 2 41":PRINT#2,CHR$(A);:PRINT#1,"U2 2 0 17 0"
  19. 120 CLOSE2:INPUT#1,A,A$,B,C:PRINTA;A$;B;C:CLOSE1
  20.